home *** CD-ROM | disk | FTP | other *** search
/ Collection of Internet / Collection of Internet.iso / msdos / wattcp / unzipped / bootp / peekl.asm < prev    next >
Encoding:
Assembly Source File  |  1987-05-01  |  384 b   |  25 lines
  1.  
  2.     include    masmdefs.hsm
  3.     include    model.hsm
  4.  
  5. codedef PEEKL
  6. datadef
  7.  
  8. cstart  PEEKL
  9. cpublic peekl
  10.  
  11.     push    si
  12.  
  13.     mov    bx,es
  14.     les    si,dword ptr @ab[bp]    
  15.     mov    ax,es:[si]
  16.     mov    dx,es:[si+2]
  17.     mov    es,bx
  18.  
  19.     pop    si
  20.  
  21. creturn peekl
  22. cend    PEEKL
  23.  
  24.         end
  25.